module geom_data_param
  use derived,only:GeometricObject
  implicit none

  ! number of geometric objects
  integer :: n_geom_obj

  ! instances of the geometric objects
  type(GeometricObject),pointer,dimension(:) :: geom_obj

end module geom_data_param
